object RenameForm1: TRenameForm1 Left = 52 Top = 144 HorzScrollBar.Visible = False VertScrollBar.Visible = False ActiveControl = NewEdit BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Rename Image' ClientHeight = 180 ClientWidth = 436 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} KeyPreview = True Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 185 Top = 36 Width = 232 Height = 13 AutoSize = False Caption = 'Current name:' end object Label2: TLabel Left = 185 Top = 80 Width = 232 Height = 13 AutoSize = False Caption = '&New name:' FocusControl = NewEdit end object ErrorLabel: TLabel Left = 188 Top = 120 Width = 229 Height = 20 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object OpenTool: TToolbarButton97 Left = 185 Top = 4 Width = 23 Height = 22 Hint = 'Open Image' DisplayMode = dmGlyphOnly Flat = False Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000CE0E0000C40E00000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 77777777777777777777000000000007777700666666666077770E0666666666 07770FE06666666660770EFE0666666666070FEFE000000000000EFEFEFEFE07 77770FEFEFEFEF0777770EFE0000000777777000777777770007777777777777 7007777777770777070777777777700077777777777777777777} ParentShowHint = False ShowHint = True OnClick = OpenToolClick end object OkButton: TButton Left = 184 Top = 144 Width = 75 Height = 25 Caption = '&Rename' Default = True ModalResult = 1 TabOrder = 2 OnClick = OkButtonClick end object CancelButton: TButton Left = 264 Top = 144 Width = 75 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 3 end object OldEdit: TEdit Left = 184 Top = 52 Width = 233 Height = 21 Color = clBtnFace ReadOnly = True TabOrder = 0 end object NewEdit: TEdit Left = 184 Top = 96 Width = 233 Height = 21 TabOrder = 1 OnChange = NewEditChange end object GroupBox1: TGroupBox Left = -36 Top = -16 Width = 201 Height = 256 TabOrder = 4 object Panel1: TPanel Left = 40 Top = 28 Width = 156 Height = 156 BevelOuter = bvNone TabOrder = 0 end end object HelpButton: TButton Left = 344 Top = 144 Width = 75 Height = 25 Caption = '&Help' TabOrder = 5 OnClick = HelpButtonClick end end